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軸 3 ー、 公 舌 堂 つや 証 三 - つ yy り Svo で ら 忘 り め ち Q 等 記せ 室 ド ウン ン | SS 
LU セ " 守 S モ Et で 当っ つぐ ささ っ や ゃ で " TS つか ぐい ロ 空 写 公 迷 
や キー 写 つ eynAS-oS3 コ ホー へ 人 で で ちの せっ ぐも …" 
EE ト NomvtGtetS 到 弄 * 
と も や ー っ 3 選 葉 定 字 つめ つい で =" 
王堂 や さら つっ い wo エロ と さっ ふら ら oe 反語 党 GYSQIS り 型 所 
りつ ロ 到 つり" や さも で ちっ 全 〇 の や っ 2" り SasbS 挟 器 A 短 家 WP 迫 つ 
= 弄 に か る" 


ズ ロ ネー さ ぐ 『 の ミヤ ー 相 り SS 人 る さ 人 8 ャ ママ ーK や さっ か 

全 ざこ ー ヤ くだり ぎっ 受 た で ・ 

ビ 躍 りこ る さっ つ 補 つっ ふ ト ーー や 写 十 つ いり 
相 こっ つぐ や で SS や "EnsoS 全 Mn り 多 っ 6 つる 7 


DOUJIN SOFT 
聞く も ナミ ダ 


今 まで 謎 の ベー ル に 包ま れ て いた 、 同 
人 ソフ ト の 裏 の ウラ 。 BULENA, 
な ど で お な じみ の HYPA SOFT 
さん の 協力 を 得 て 、 こ こ に スタ ッ フ の 
開発 状況 を 再現 。 果て し の な い 同 人 ソ 
フト 開発 物語 を 、 キミ は 涙 な くし て は 
読め な い / 
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SRC5H 
2 


(Zn 


て と 5> 語 し ち 書 ol 3 と き に は 
も っ べつ っ 話 考え ひ ) つ ゃ 
つ ぬ に [o ュ の 5ue 項 上 ス ト >2LZ あ 3。 
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9 


QuIKKSHS0I 
決っ T-9 味 店 


sr!OIHY 和 


上 


L 


よ NSHUG191 リ 人 


2 委 4 ー 


に に) さこ 
HfR SOFT は OSN。 
NE 


だ 16 ゆ 人 は , な 絵 と と 
総 ) さ ESOEI と 1 ラー ジイ デラ ビ ゃ 
し ) ビン も シ 4 全 N 


CI は ) ーー お 5 
セー ラー 所.2CX- き の . 彼 の 
万 - CA な い モ を の は は t ま SO 
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NANAAA ズバ 


5 0 N 
2 人 EECNCBN の 5 る の っ 時 or に ON O 
SS Si 

< つ ^ ね 。 > が す 提 釣 


[ご れろ ちあ 工 集 L て 
まあ 5。 ソ な 絵 坦 5 
方 が が 2 き o- 8 


多 25 ねぇ ヘー ジ 

7 

< お bp5。 
閥 432 
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※ 掲 載 ゲ ー ム の メデ ィ ア は 5 か 


すべ て ディ スク 版 で す 
レン ん 人 -] | 北 種 名 
宇宙 刑事 キャ リ 500 円 名 
LONG-NGHT 700 円 | クイ ズ を 解 か な きゃ スケ ベ が 見 れ な い の た 4 
LIGHT-BLUE AD| PC-88SR 以 降 900 円 | 学校 か らい き な り 宇 宙 空 間 ヘ へ / 優子 は 地球 を 救え る か | 44 
DESERT MOON 0 | PC-88 シ リー ズ 700 円 | 難問 、 珍 問 を 解き な が ら 世 界 7 カ国 を 回 る クイ ズ ゲー ム | 45 
えろ て ぃ っ (まじ か る と り っ ぷ AD| Pc-98・88 シ リー ズ し 600 円 | エリ ス 姫 を 助け る た め に オト コ を 鍛え よう 18 
小 用 に ゅ うろ お だ あず VOL.4 AD| PC-98・88 シ リー ズ 100 女子 高生 の 真奈 美 ちゃ ん を イカ せ て あげ よう 20 
1 1 
愛用 に ゅ うろ お だ あず VOL.5 AD| PC-98・88 シ リー ズ |,100 円 | 香 宗 美 ちゃ ん と イン ラン お 友達 の 輸 / 2 
ぐる ーー ぶ CAD 
《 っ きい P | PC-88 シ リー ズ 1,000 円 | 表裏 いっ た い の パ ズル ゲー ム 。 所 要 時 間 も 記録 し て くれ る | 53 
| Radsh P | PC-98・88 シ リー ズ 1,100 円 | ハラ ハラ ドキ ドキ の パズル ケ 30 
> 情報 
Anime Wars S | Pc-98 シ リー ズ 1 し 500 円 | 通 甘 な テレ ビ 局 の 視聴 戦争 を 生き 残れ る か ? 3 
ル / P | PC-88 シ リー ズ 1.000 円 | パズル の 下 に 隠さ れ て いる 謎 を 解明 せよ / 25 
AD| Pc-88 シ リー ズ | | し 000 円 | 本 格 的 な AD V。 ユキ ちゃ ん の 変身 シー ン が 見 も の 26 
お 幸 様 (らぶ T | PC-98・88 シ リー ズ 6,800 円 | 同人 ソフ ト が 市 販 ソ フト に な っ た 記念 すべ き 作品 lg 
D0WN TOWN SHUFFLE ver 2.0 P | PC-88SR 以 降 1,000 円 | オイ チョ カブ と パズル の 複合 ゲー ム 33 


INDEX に 掲載 し て いる ゲー ムジ ャ ン ル の 略号 は 次 の と お り で す 。 
人 A 草 ア クシ ョ ン AD 見 了 アドベンチャー 日 和民 ロー ルプ レイ ング 草 シ ミュ レー ショ ン バ ズル 
丁重 テー ブル ロ 草 その 他 


SHOW DOWN PC-88 シ リー ズ 1.000 円 勝っ て 過激 グ ラフ ィ ッ ク を 見 よう 
AUTUMN PARK AD| PC-88 シ リー ズ 入 し て ゆか り ちゃ ん に 会 わな けれ ば 23 
MY FRIENDS 0 | PC-88 シ リー ズ 200 円 | 女子 高生 2 人 が 巻き 込ま れ た ヘン な 事件 と は ? 24| 


スピ 3/ ト AD| PC-88SR 以 降 700 円 竜 の ウロ コ を 求め て アノ ル の 大 四 際 が 始ま る 46 


Rase Dead PC-88SR 了 | 1 し 000 円 | 世界 を 抜 う た め に | は あの 電 の ウロ コカ 必要 な の だ 


ぱい な っ ぷる まあ まれ | 


ディ スク 


ば いな っ ぷる えい ど | 0 900 7 」 クラ フィ ッ ク の ユー ティ リティ 
| gu な っ る えい と 中 | 900 7 円 | ぇ いと 1 を 合用 し 28 
コ 風 の パズル ゲー ム 29 


0 
P | FM-7 シ リー 800/700 円 | 一 見 
P 


| FM-7 シ リー ズ 900/700 円 | 趣 座 し い カラ ー パ ズル 。 ど ちら か と いえ ば 


る えい と ど W・X 


BULENA AD| PC-88 シ リー ズ 2,500 円 | な ん と 6 枚 組 の ゲー ム 。 グ ラフ ィ ッ ク の 質 は ピカ イチ 14 
| 時 の 箇 AD| PC-88 シ リー ズ 1,000 円 | な ん と な く 温 か く な る メル ヘン AD V だ l6 
| Remembree PC-88 シ リー ズ 900 円 | 美 少 女 い っ ぱい 、 ス リル いっ ぱい の SF・ADV 
ぼ ( は 漫 折 | PC-88 シ リー ズ 100 円 聞い て 驚く この 値段 。 それ に し て は 遊べ る ぜ / 


GAL ナ ン バ 大 作戦 


いこ ちゃ ん 決死 の 教 出 大 作戦 AD| PC-88 シ リー ズ | 1,200 円 | 市 販 ソ フト に 負け な いく らい オモ シロ イノ 36 
ESP 軍 団 美 少 女 ジ ャ ッ カル の 巻 |AD| PC-88 シ リー ズ 1 し 000 円 | じ ま お クン の 武器 は 、 な ん て っ た っ て 聖なる マラ が | 
美 少 婦 ジ ャ ッ カ ル 2 オレ の 島 AD| PC-88 シ リー ズ 1.000 円 | 生後 活 / 今度 は 主人 公 だ ゼ 39 
牙 AD| PC-88 シ リー 000 円 | 京都 に は び こ 長 を や っ つけ ろ 39 


ザッ ドラ ゴン プリ ン セ ス 18 PC-88SR 以 降 、XI、FM-7 800 円 | 回 っ て くる モン スタ ー が みん な 美 少 女 な の だ 40 

| スカ ル タ ワー PC-88SR 以 降 、XI シ リー ズ 1 8 な 、 な ん だ 7? この 迷路 の 広 さ は タダ モノ じゃ な い 

せ し ー る PC-98 シ リー ズ 1,200 円 | 同人 ソフ ト と は 思え な い グラ フィ ッ ク の 美 し さ 

ROCAL At6 0 | PC-88 シ リー ズ 1.000 円 | アニ メキ ャ ラ の CG 集 48 

| っ く jn コミ タッ ッ R AD| pc-8s シ リー | 980 円 倫 訣 な コミ ケ の 舞台 裏 が 見 られ る AD V 49 
記 ] 


各 ゲ ー ム の 対応 機種 シリ ー ズ の 内 容 は 、 次 の よう に な っ て いま す 。 介 PC-98 シ リー ズ PC-9801/E/F/M/VF/VM/VX 
@PC-88 シ リー ズ PC-8801/mkI/SR/FR/MR/TR/FH/MH/FA/MA/VA 介 PC-88SR 以 降 PC-88SR/FR 


MR/TR/FH/MH/FA/MA/VA 倫 FM-7 シ リー ズ FM-7/NEW7 介 FM-77AV シ リー ズ FM-77AV/20740 介 
X 1 シリーズ X1/D/C/F/turbo /turboIl/turbo 和 l 免 MSX2 MSX2 専 用 で す 


Z5 


に 
お 店 し 買え おい オ モラ ロ さ 


〒248 神奈 川 県 鎌倉 市 手 広 1421 
伊 神 浩 様 方 (R-soft 開発 室 ) 


時 先 
リル 4 


欲し い ソ フト 名 や 、 特 に 機種 
名 ・ メ ディ ア は し っ か り 記 入 
し て くだ さい 。 せ っ か く 届 い 
た の に 動か な い …、 な ん て 章 
し いも ん ネ / 


エレ イン ソフ ト 


ECE-SOFTWARE FACTORY 


工 168 東京 都 杉並 区 永福 2-4-12 
ハイ ツ 藤 201 号 石井 様 方 
ECE-SOFTWARE FACTORY 


希望 する ソフ ト 名 を 記入 の 上 、 ソ 
フト の 代金 分 (送料 込み ) の 無 記 
名 郵便 小 為 替 を 同封 し 、 上 記 の 住 
所 まで 郵送 し て くだ さい 


ぐる - ぶ CAD ママ 


〒276 千葉 県 入 千 代 市 勝田 台 
6-22-12 斉藤 様 方 
ぐる 一 ぶ CAD 


常 SIN 是 


音 SH* て 芋 


希望 する ソフ ト 名 を 記入 の 上 、 ソ 
フト の 代金 十 手 数 料 500 円 分 の 無 
記名 郵便 小 為 替 を 同封 し 、 上 記 の 
住所 まで 郵送 し て くだ さい 


G. P.M. 


〒270 千葉 県 松戸 市 常盤 平 西 窪 町 
17-1 GPM 本 部 


〒108 東京 都 港 区 白金 台 3-16-26 
三宅 様 方 担当 者 Yake 宛 


〒332 埼玉 県 川口 市 飯塚 3-16-2 
P.E.C.「 エ レイ ン ソ フト 」 
通販 係 


希望 する ソフ ト 名 を 記入 の 上 
フト の 代金 分 (送料 込み ) 
名 郵便 小 為替 を 同封 し 、 上 記 の 住 
所 まで 郵送 し て くだ さい 


563 大 阪 府 池田 市 石橋 2-15-31 
大 栄 料 206 号 磯田 様 方 


希望 する ソフ ト 名 、 横 種 名 を 記 
の 上 、 ソ フ ト の 代入) 
の 無記名 郵便 小 為替 を 同封 し 
E.C.「 エ レイ ン ソ フト 」 通 
で 郵送 し て くだ さい 


STUDIO TEN TTP と 


〒300 茨城 県 土浦 市 中 荒川 沖 町 〒641 和歌 山県 和歌 山 市 雑賀 崎 
18-6 高橋 様 方 1165 木野 様 方 SOLPAS 係 


希望 する ソフ ト 名 を 記入 の 上 、60 
円 切手 、 返 信用 封筒 を 同封 し 、 上 
記 の 住所 まで 郵送 し て くだ さい 
申し 込み 用 紙 を お 送り し ます 


党 H て 芋 


ゞ 情報 STUDIO TEN 
遇 希望 の ソフ ト 名 を 記入 の 上 、 ソ フ | 中 | 希望 する ソフ ト 名 を 記入 の 上 、> 申 | 現在 、 通 販 は 調整 中 で す の で し ば 
送 | ト の 代金 送料 500 円 分 の 無記名 | 胡 フト の 代金 分 (送料 込み ) 導 | らく お 待ち くだ さい 。 コ ミケ や コ 
券 | 時 人 為替 を 同 刺し 、 上 記 の 住所 放 | 他人 小 替 を 、 上 記 の 住所 誠 | ミス ト な と ど 即 売 会 で は 販売 を 予定 
消 | まで 郵送 し て くだ さい 詳 | き し て くだ さい に 4 し て いま す 

Z6 


SOFT FORUM 


〒614 京都 府 八 幡 市 山城 衝 幡 郵便 
局 私 書 箱 32 号 
SOFT FORUM 


TBUKKA so 


〒170 東京 都 豊 島 区 東池袋 5-11-9 
大 塚 様 方 
TSUKKA sortware 


IE "ば いな っ ぷる まあ まれ い ど 


〒144 東京 都 大 田 区 西 谷 1-13 
-22 落合 様 方 
ぱい な っ ぷる まあ まれ い ど 


現在 、 通 販 は 調整 中 で す の で し ば 
らく お 待ち くだ さい 。 コ ミケ や コ 
ミス ト と な どの 即売 会 で は 、 販 売 


常 SH ま て 生 


二 | 希望 の ソフ ト 名 を 記入 の 上 、 ソ フ 
送 | ト の 代金 分 (送料 込み ) の 無記名 
とう 郵便 小 為 替 を 同封 し 、 上 記 の 住所 
に 3 


希望 の ソフ ト 名 を 記入 の 上 、 ソ フ 
ト の 代金 分 十 送 料 ( 2 枚 ま で 300 円 、 
一 枚 増 える ご と に 100 円 プラ ス ) 分 


ENKOTeE3 


を 予定 し て いま す まで 郵送 し て くだ さい の 無記名 郵便 小 為 替 を 郵送 
〒221 神奈 川 県 横浜 市 神奈 川 区 
大 口 仲町 164-12 石川 箇 様 方 
HYPA SOFT 
導 
二 | 希望 の ソフ ト 名 を 記入 の 上 、 ソ フ 
@。 送 | ト の 代金 分 (送料 込み ) の 無記名 
ー 労 | 時 全 小 旋 替 を 同封 し 、 上記 の 住所 
源 | まで 郵送 し て くだ さい 
4 
1 P 本 
〒851-01 へ ノ 肖 崎 県 長崎 市 宿 町 | 〒178 東京 都 練馬 区 東大 泉 3-21-9 
209-3 サン ハイ ツ 201 号 衣 蘭 201 号 
レ パー スソ フト ファ ミリ ー ソ フト 
ゃ 希望 する ソフ ト 名 を 記入 の 上 、 ソ 加 希望 する ソフ ト 名 を 記入 の 上 、 ソ 
送 | フト の 代金 送料 300 円 分 の 無 記 | 送 | フト の 代金 分 (送料 込み ) の 無 記 
労 | 人 小 放 替 を 同封 し 、 上 記 の 住 安 | 名 部 便 小 欠 を 同 待 し 、 上 記 の 住 
詳 || 所 まで 郵送 し て くだ さい 老 || 所 まで 郵送 し て くだ さい 


〒657 兵庫 県 神戸 市 灘 区 篠原 南町 
1-1-4 森重 様 方 
ユニ ー ク ス 


〒111 東京 都 台 東 区 浅草 郵便 局 
私 書 箱 108 号 
ユウ ユウ 内 パソ ケッ ト 


通販 希望 と 書い た 手紙 と 、60 円 切 
手 を 貼っ た 返信 用 封筒 (宛先 明記 ) 
を 同封 し 、 上 記 の 住所 まで 郵送 
申し 込み 用 紙 を お 送り し ます 


常 SI* 了 て 旦 


曲 A A 


〒358 埼玉 県 入間 市 東 藤沢 3-17-4 
伊藤 様 方 
RANMA PROJECT 


十 | 希望 する ソフ ト 名 ・ 機 種 名 を 記入 
送 | の 上 、 ソ フト の 代金 分 (送料 込み ) 
| の 無記名 郵便 小 為替 を た 、 上 記 の 住 
才 有 | 所 まで 郵送 し て くだ さい 

Ll 


〒121 東京 都 足 立 区 伊興 町 3 -10 
-20 
ロー カル コン ピュ ー タ クラ プ ブ 


夫 | 希望 の ソフ ト 名 を 記入 の 上 、 ソ フ 
送 | ト の 代金 分 (送料 込み ) の 無記名 
光 | 衝 便 小 為替 を 同封 し 、 上 記 の 住所 
其 暫 まで 郵送 し て くだ さい 。 


希望 する ソフ ト 名 を 記入 の 上 、 ソ 
フト の 代金 分 (送料 込み ) の 無 記 
名 郵便 小 為替 を 同封 し 、 上 記 の 住 
所 まで て 郵送 し て くだ さい 


常 SH ぷ 隊 て 芋 


二 


みな さま お 待ち か ね 、 ソ フト プレ ゼン ト の ペー ジ が や っ て まい り ま し た / 
お 店 で は 買え な いも の ば か り だ か ら 、 希 少 価値 は 高い リ 。 ク イズ に 応募 し 
て 、 楽 し い ソ フト を ドン ドン 当て て ね / 


ブフ トブ レセ ツ ト 


ト の 、 タ イト ル 画 面 を バラ バラ に し た も の 。 さ て 、 こ の 中 て で 服 を 着 て いな い 女の子 が 登場 する の は 、 な ん と いう 
ソフ ト で し ょ うか 7? と いう の が 問題 。 簡単 で し ょ 、 エ ッ 、 ナ ニ 、 ヒ ント が 欲し いっ て ? じゃ ちょ っ と だ け 教 
えて あげ る ね 。 答 え は 2 つ あ る の だ / 


と じ 込 み ハ ガキ に 40 円 切手 を 貼り 、 プ レ ゼ ント ソフ ト の 中 か ら 欲 し い ソ フト 名 、 そ し て クイ ズ の 答え を 書い て 送 
っ て くだ さい 。 締切 は 来年 1 月 末日 で す 。 当 選者 の 発表 は 、 賞 品 の 発送 を も っ て か えさ せ て いた だ きま す 。 ド シ 
ド シ 応 募 し て ネ . 


| ソフ ト 名 | サー クル 名 | 機種 名 | 本 数 | ソフ ト 名 | サー クル 名 | 機種 名 
LIGHT BLUE ERM 8N いる | ば いな 2 が る RM リー メ 


DESERT MOON| RESORTWARE pa リーズ HYPA SOFT |PC88 シ リー ズ 


する 償 は そり っ | エレ イン ソフ ト | PC98 シ リー ズ Remembrance | HYPASOFT |PC89 シ リー ズ 


トー 
くっ きい ぐる 一 ぶ CAD |PC88 シ リー ズ | ぼく は 漫研 | パー スソ フト |PC88 シ リー ズ 


ダブ ルフ ェ イ ス | STUDIO TEN 本 シリ ー ス | ESP 軍 日 | ユニ ー ク ス PC88 シ リー ズ 


] ] 
ミル キー バル | STUDIO TEN PC08 シ リー ズ | 人 | オレ の 島 ユエ ミー クズ PC88 シ リー ズ 


AUTUMN PARK | SOFT FORUM | RC シリ ー | | スカ ル タ ワ ー |RUNTECH soft | 
MY FRIENDS |sorr FORUM |RC88 シ リー ズ せ し ー る AND PC8 シ リー ズ 


| ]Tsukw ] PC-88SR [ ロー カル コン 
る ど Uy ト | 蘭 | ROCAL AT6 ビュ タラ ラッ PC シリ ー ズ 
Raise Dead 155 9SR ケット | ビュ ニタ クラ フ PC69 シ リー ズ 
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H-soft 

ECE-SOFTWARE FACTORY 
エレ イン ソフ ト 
ぐる 一 ぷ ぶ CAD 


> 情報 

STUDIO TEN 

それ ゆけ パソ コン クラ ブ 
SOFT FORUM 
TSUKKA software 
ぱい な っ ぷる まあ まれ い ど ご 
HYPA SOFT 

パー スソ フト 

ファ ミリ ー ソ フト 

ニー クス 
HUNTECH soft 
HANMA PROJECT 
ロー カル コン ピュ ー タ クラ ブ 


大 日 本 印刷 株 式 会 社 


eccZ/ zz る 2 


今回 の 過激 で 元気 / 同人 ソフ ト 大 集合 

: ま し た 皆さま 、 あ り が と う ご ざ いま し た 。 と 

クマ ー ケ ッ ト 間 際 の 大 変 お 伯 し いと き に 、 こ ころ 
よく 取材 に 応じ て くだ さっ た STUDIO _ TEN ならび 
に ユニ ー ク ス の スタ ッ フ の 皆さん 、. ま た 同人 サー クル の 
実態 や を イラ スト で 再現 し て いた だ いた HYPA 80 
FT の 石川 さん 、 最 後 で 申し 訳 あ り ま せん が 、 最 大 級 の 
あり が と う を 送り ます 。 


ツラ シン ッ ニング 
& エ ディ トリ アル ハル カプ ラン ニン グ 
アー トディ レク 係 田 裕 


上 千 菊池 美佳 木村 茂 島田 倫 人 堀 良 江 
鈴木 潤一 正 影 秀 明 南 辰 真 村上 紳 


ライ ティ ン 


レイ アウ ト @ ノ イエ ハー ス ダディ ー ズ ホー ム 


イラ スト @TATSUMA MINAMI ヒロ ピー 
プロ デュ ー ス @ 涯 沢 雅 之 富永 情 人 
カバ パー イラ スト @TATSUMA MINAMI 


禁 無断 転載 CI988 辰巳 出 上 株 式 会 社 


1 一 83 ペ ー ジ は プロ グラ ムリ スト を 掲載 じ で いま す 


ぬか りや ゆめ 
ヲ 回 ダ ヲ ム 午 居民 


oc 。  N-88 ベ ー シ ッ ク 
の キミ て も 安 必 フロ グラム 


と か ら 先 は 巻末 8 お 6 ペ ー ジ か ら 読ん で ネ / 


91 一 83 ペ ー ジ に 掲載 し て いる プロ グラ ムリ スト に 関す る ぉ 問い 合わ せ は 、 下 記 の 住所 まで 
葉書 か 封書 に て おぉ 願い し ます 。 


〒166 東京 都 杉 並 区 阿佐 谷 北 1-3-6 ハル カブ ラン ニン グ 
同人 ソフ ト 大 集合 』 プ ログ ラム リス ト 質 問 係 


ご 質問 以外 に 、 必 ず あ な た の 住所 ・ 氏 名 ・ 年 齢 を 明記 し て くだ さい 。 
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プロ グラ ムリ スト 平均 入力 時 間 
160 ヶ 


UCHI : 


ブロ グラ ムリ スト 還 
予約 入 40 ヶ 語 


2 し MAZE 


ブロ グラ ムリ スト 平均 入力 時 間 


9 分 


429 SND.1:FOR OB=9 TO 2:BEEP 1:FOR IB=9 TO 29:NEXT:BEEP 9:F 
0R IB=9 TO 99:NEXT:NEXT:RETURN 

439 xSND.2:FOR OB=9 TO 4:BEEP 1:FOR IB=OB TO 5:NEXT:BEEP 9@:F 

OR IB=OB TO 19:NEXT:NEXT:RETURN 

449 xSND.3:FOR OB=9 TO 4:BEEP 1:FOR IB=9 TO 29:NEXT:BEEP 9:F 
OR IB=9 TO 29:NEXT:NEXT 

459 IF INKEY$="" THEN 459 ELSE RETURN 

469 SND.4:FOR OB=9 TO 15:BEEP 1:FOR IB=9 TO 5:NEXT:BEEP 9:F 

OR IB=9 TO 19:NEXT:NEXT:RETURN 

479 IF INKEY$="" THEN 479 ELSE RETURN 

489 xZUKKO:FOR OB=9 TO 89:BEEP 1:FOR IB=9 TO 29:NEXT:BEEP 9: 
FOR IB=9 TO 29:NEXT:NEXT:A=&HCFA6+69x(PNBR MOD 2)+8999X(PNBR 
\ 2):B=HAKO(24):CALL DISP(A,B) 

499 INCOM(PNBR ) =9:FOR BP=9 TO 999:NEXT:RETURN 


599 DATA 59,"!XET$3$s$VIYIIIIIIIIIIIIIIIIIIIO#5 六 9" 
519 DATA 39 , "1X%S%C%/%J%^%5 18%A%9%31YIIIIIIIO 拉 9" 
529 DATA 29,"!X%4%_ く <h$J%M%C%HIYIIIIIIII 

539 DATA 89, "1X>C$7%4% 王 1YIELIUULD 

549 DATA 


559 DATA 799,"!X@FF#M35.$N#E#PIYIIIIIIII 
569 DATA 1999,"!X%V%?$N2c く <h$J@T9aF^$11YII 
579 DATA 899,"!X#G#U#N#D#A#tM$N%W%1%bIYII 
589 DATA 599,"!X9b:J$N%@%K%^IYIIIIIIIIII 
599 DATA 499,"!X%+%9%?7%M%C%HIYIIIIIIIIII 
699 DATA 399,"!X$/$D2 く IYIIIIIIIIIII 

619 DATA 459,"!XB9$N<JIYIIIII 

629 DATA 989,"!X@P%N?9>0B@O:$N7P:QFCL9!YI IIO 半 9#8 村 9" 
639 DATA 2599,"!X%G%3%1! く %7%g%S 18%11 く %-1YIO 六 2 六 5 六 9 六 " 


649 DATA 2399,"!X<JIJ%i%C%HIYIIIIIIIIIIIIIO2 拉 3 六 9 半 9" 
659 DATA 699,"!X%(%C%A$JK\IYIIIIIIIIIIIIII IO 六 6# 半 9" 
669 DATA 2709,"!X#Nte 失 M?M@8%21 く % 王 !YIIIIIIIO 拉 27 半 時 9" 


679 DATA 2599,"!X7_Hx$N?H$Ni1?7HIYIIII 1 1 O2 韻 5 村 9#" 
110 せ 1#1#9 失 9" 


689 DATA 1199, 
699 DATA 2999,"!XKmIYIIIIIIIIIIIIIIII 
799 DATA 6899,"!X$x>nMM$/$1$VIY 
719 DATA 5399,"!X$「$V$J$$7eCelY 
729 DATA 2899,"!XJ\!J% 三 %AIKIYIIIIIIIIIIIIIO 失 2 持 8##9 半 9" 
739 DATA 2409,"!X$A$g$5$^$2%+%D%11Y!1111IIO#2 柱 4 失格" 
749 DATA 19,"1X%:%C%3%11X!xIYIIII3MF@>^1JKW く ) 1%1% り 
759 DATA !! 柱 1 1 12。11 拉 3,11 失 4,11 失 5 
769 DATA !! 拉 6 1#7」11 持 8 1 1 持 9。 提 1 半 9 
779 DATA 持 1#1 , 六 1 韻 2 六 1 半 3 , 拉 1 韻 4 。 韻 1#5 
789 DATA 1 半 6 ,##1#7 , 提 1 拉 8 。 半 1 半 9 2 


799 DATA 2#1 , 半 2 半 2 , 拓 2 半 3 , 六 2 半 4 , 韻 2#5 


サー クル か ら の ひと こと by R-soft 

Pd 良い ゲー ム を 作る た め に は 、 一 に 研究 、 二 に 研究 。 と に か く 研 究 じ 
ア ドバイ ス か な い の だ / 最初 は 、 パ ソコ ン 雑 誌 に 掲載 され て いる 投稿 ブログ 
ラム な ど を 参考 に 、 ほ か の 人 は どん な 工夫 を し で る か 、 な ん で 見 る 
の も いい 。 自分 で 作っ た ブロ グラ ム を 、 よ く 知 っ そい る 人 に 見 で も 
ら っ て 、 添 前 し て も ら え ば か な り 早 く 上 達する 。 あと は 、 ハー ド の 
話 に な る が 、 プ リン タ は な る べく 用 意 し た ほう が いい だ ろう 。 リ ス 
ト の チェ ッ ク は プリ ント アウ ト し た も の の ほう が よく わか る か ら 。 
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0 


PYO 

159 FC=7:KX=179:KY=177:KC$="272M$SGM7$S$^$9$+ 1J 持 21A 持 42MIKI) "5 
GOSUB xKANPYO:LOCATE 26,18:COLOR 7:INPUT " ",NINS:CLS:NIN=VA 
L(NIN$):IF 2>NIN OR 4<NIN THEN 159 

169 LINE(169,19)-(489,179),7,BF:FOR I=9 TO 4:FOR J=9 TO 4:LI 
NE (169+Jx64,19+IX32)-STEP(64,32 ) , 9,B:NEXT:NEXT 

179 BC=2:FOR 1=9 TO 4:FOR J=9 TO 4:KX=168+Jx64:KY=18+Ix32:RE 
AD KC$:GOSUB xKANPYO:NEXT:NEXT 

189 ' 

199 FC=6:BC=1:FOR I=9 TO NIN-1:KX=19+489X(] MOD 2):KY=19+199 
※( TI\2) : KC$= "PA 宇 Y#E#R!1#"+RIGHT$(STR$(T+1 ) , 1 ) :GOSUB xKANP 
YO0:KY=KY+20:KC$=" 1 11O 六 9 半 拉 9 村 9911" 1GOSUB xKANPYO:NEXT 
299 FOR I=9 TO 23:PNBR=I MOD NIN 

219 GOSUB XSND.1:LINE (169,175)-(489,194) ,9,BF:FC=7:BC= 
179:KY=177:KC$= "#P 半 し 祝 A 村 Y#E 半 RI ! 村 "+RIGHT$(STR$(PNBR+ 1 ) ,1)+" 
1":GOSUB xKANPYO 

229 LOCATE 26,18:INPUT " ",SEL$:CLS:SEL=VAL(SEL$):IF SEL<1 0 
R SEL>25 THEN GOSUB xSND.4:GOTO 229 ELSE IF PRICE(NAKA1(SEL- 
1))=9 THEN GOSUB XSND.4:GOTO 229 

239 GOSUB *SND.2:SEL=SEL- 1 :X=SEL MOD 5:Y=SEL \ 5:A=&HC334+8※ 
X+89x32xY:B=HAKO(NAKA1(SEL ) ) :CALL DISP(A,B):LINE(169+64xXX,19 
+32xY ) -STEP(64,32),9,B 

249 IF NAKA1(SEL)=24 THEN GOSUB *ZUKKO _ ELSE INCOM(PNBR )=INCO 
M(PNBR )+PRICE(NAKA1 (SEL ) ) 

259 LINE (169,175)-(489,194),9,BF:FC=6:KC$=NAKAN$(NAKA1(SEL ) 
) :GOSUB xKANPYO:GOSUB ・3 

269 SN=INCOM(PNBR ) : KC$ CNS=19999:FOR NMK=9 TO 4: 
S:R=SN MOD CNS:KC$=KC$+" 杜 "+RIGHT$(STR$(Q),1) :SN=R:CNS=CNS 
19:NEXT 

279 PRICE(NAKA1(SEL ) ) =9:FC=6: BC=1:KX=42+489X(PNBR MOD 2):KY= 
39+199X(PNBR \ 2):GOSUB KANPYO 

289 NEXT 

399 FOR ED=9 TO 9:GOSUB XSND.2:NEXT:FOR ED=9 TO 999:NEXT 

人 LINE (169,19)-(489,179),9,BF:LINE (169,175)-(489,194),9, 


: KX= 
!1! 


329 FC=6:BC=9:KX=169:KY=29:KC$="1T6%5i=xNi1U":GOSUB xKANPYO 


349 KY=69:KC$= "11%3%1$r9Zz$$$?2%d%D$KI 1$1$2$J$S$F >P$J$$" EGOSUB 
*KANPYO 

359 KY=89:KC$=" 11%^%M$S0$7$J$+$C$7$@$m$&$MI )$($CI$7/$ "EGOSUB 
*KANPYO 

369 KY=199:KC$= "11!$=$&$J$SN! )$=$1$8$CAaB.$+$/$77]$r 1%1%":GOSU 
B _xKANPYO 

379 KY=129:KC$= "11$F$J46$8$G1$3Z$7$5$ も G$/$@$5$$$^$7 1 持 "EGOSUB 
*KANPY0 

389 KX=272:KY=149:FC=6:KC$=" ! !#D#T 半 B 拓 5 持 O 村 下村 t 持 WM 失 8#T 拉 6":GOSUB 
XKANPYO 

399 KX=179:KY=177:FC=7:KC$="$b$8#1EY$d$)J$^$9$+1J#YI7#NIKI) 
GOSUB *KANPYO:LOCATE 26,18:COLOR 7:INPUT " ",NIN$S:IF NIN$="y 
"OR NIN$="Y" THEN RUN 59 ELSE END 

499 xKANPYO 

419 KL=LEN(KC$)-1:FOR KRI=1 TO KL STEP 2:KD=ASC(MID$(KC$,KRI 
。 1 ) )x256+ASC(MID$(KC$,KRI+1 , 1 ) ) : PUT(KX+KRIx8,KY ) ,KANJI (KD) ,P 
SET ,FC,BC:NEXT :RETURN 


359 GOTO 179 

369 COLOR 2:BEEP 1:FOR I=TY+1 TO 23:LOCATE TX+1.I:PRINT "1 
:NEXT 

379 FOR !I=TY+1 TO 23:LOCATE TX+1,I:PRINT " "i:NEXT:BEEP 9:CO 
LOR 7 

388 IF TX+1>MX AND TX+1<MX+4 THEN COLOR 2:LOCATE MX+1 ,23:PRI 
NT "xxx"i:FOR 1=9 TO 1999:BEEP 1:BEEP 9:NEXT:CLS:COLOR 7:PRI 
NT "Your SCORE= "1SC:A=8&H35D9:CALL AiEND ELSE 179 

399 IF INT(RND(1)*L)=1 AND TX+1>MX+1 AND TX+1<MX+3 THEN 369 


サー クル か ら の ひと こと by ECE-SOFTWARE FACTORY 


っ 
ア ドバイ スス  。 史 < ケー ム を 作る と き は 、 ど ん な ジャ ン ル の も の が いい だ ろう 
っ て いろ いろ 悩ん だ 。 最初 っ か ら HP は や シミ ュ レー ショ ジン な ん て 

で きる わけ が な い の で 、 ボ ク は と っ か か りや すず クイ スズ グ ゲーム を 選 
ん だ けど …。 テ ー ブ ル ゲー ム や 、.ADV な ん か も オス ス メ だ と 思う 
よ 。 ADV は 、 し っ か り じ だ ジ ナ リオ を 作っ て お か な いと 、 途中 で 
」 グチ ャ グチ ャ に な っ て し まう か ら 気 を つけ て 。 グ ラフ ィ ッ ク に よっ 

て 雰囲気 も 違っ て くる か ら 、 リ キ を 入れ て 頑張 ろう / 


7 
ペ 一 テ これ は 、 ソ フト の 開発 が コミ ケ に 間 に 
4 人 で 遊べ る バ テイ 合わ な いと いう こと で DTB soft が 


ー グ 区 ウ レ ド な の だ 生生 RE Ep 


た 限定 版 「 ご めん な さい ソフ ト 」 な の だ 。 


glKelr 内 容 は 福袋 的 バズ ル ゲー ム だ よ 。 


29 ''' ONENGA DISK by DTBsoftware '*! 
25. ON Reg19 by TENTEKO 2 
39 ''"'′ illustration pby H.SUMIYOSHI '「『" 


49 BLOAD "nakami" 

45 AsVARPTR(#1)+9:BLOAD "displynmC",A 

59 CONSOLE 9,25,9,1:WIDTH 49,29:ROLL 197:ROLL 197:DEFINT A-Z 
:DIM HAKO(24) ,NAKA1(24) ,PRICE(24) ,INCOM( 3 ) ,NAKAN$(24) :DISP=V 
ARPTR(#1)+9:FOR I=9 TO 24:HAKO(1T)=&H2999+&H392xI:NAKA1(1)=1: 
NEXT : SE=VAL(RIGHT$(TIME$,2) ) : RANDOMIZE(SE) 

69 FOR !I=9 TO 59:X=RND(1)x24:Y=RND(1)*24:SWAP NAKA1(X),NAKA1 
(Y) :NEXT:FOR I=9 TO 4:FOR J=9 TO 4:NAKA2(1,J)=NAKA1(I+5XJ):N 
EXT:NEXT:FOR I=9 TO 24:READ PRICE(1 ) ,NAKAN$(1) :NEXT 

79 LINE (9,9)-(639,199),4,BF:LINE (169,19)-(489,179),9,BF:LI 
NE (169,175)-(489,194),9,BF 

89 FC=6:BC=9:KX=169:KY=29:KC$=" 1!T#D#T#BGUAhC%1 8&77=UJ!B^99o! 
U":GOSUB xKANPYO 

99 FC=7:KY=49:KC$="11%k! く %k$04JC1 1! xi22C く T$02hLL$NH TSY=g" EGOS 
UB xKANPYO 

199 KY=69:KC$="!1HV$K$ 「$1$F$$$- 1$Cf$NIJJX$T く h$CSF$$" GOSUB ※ 
KANPYO 

119 KY=89:KC$="! 1$-$^$91##2#48D$NH 「$,$「$$$$71 BSBGSN" 1GOSUB ※ 
KANPYO 

129 KY=199:KC$="!!Am3[$r6%$$$^$9!#":GOSUB KANPYO 

139 FC=2:KY=129:KC$="11$7$@$71$1H%:%C%3%15511$,=P$21 で $01$":G 
0SUB xKANPYO 

149 KY=149:KC$="11$=$N>1$GA4$F$NIJJX$ST く :$$$^$9!":GOSUB xKAN 
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219 COLOR 5:FOR 1=9 TO LN:BEEP 1:FOR Y=2 TO 23:LOCATE LX(I) , 
YiPRINT " NEXT:BEEP 9:IF MX=LX( 1 ) THEN 239 ELSE NEXT 

229 FOR 1I=9 TO LN:FOR Y=2 TO 23:LOCATE LX(I),Y:PRINT " "5ENE 
XT:NEXT:F=9:GOTO 169 


239 COLOR 2:FOR 1=1 TO 19:BEEP:LOCATE MX,24:READ A$:PRINT A$ 
jiNEXT:CLS:PRINT "GAME OVER ダッ セ " ECOLOR 7:PRINT "ROUND= "iROU 
ND:A=&H35D9:CALL A:END 

249 DATA H,Y,P,A,,S,0,F,T, 


サー クル か ら の ひと こと by ば ぱい な つぶ る まあ まれ い ど ご 
ファ ボク の 場合 は ソフ ト 開 発 に 関し て 、 ひ と 通り の こと は 自分 で で きる 
ド Au ス の で 、 そ れ ほ ど 苦 労 は し な いけ れ ど 、 の め り 込 ん で いく うち に 、 人 金 
銭 的 な 面 で ちょ っ と 困っ た こと が ある 。 最初 は 簡単 な ゲー ム を 作っ 
て 満足 し て いた ん だ けど 、 だ ん だ ん それ で は 収まら な く な っ て 、 凝 
っ た も の を 作り た く な っ で くる ん だ 。 そ うす る と 、 あ れ が 欲し い 、 
これ が 必要 だ 、 な ん て こと に な っ て くる 。 新品 の ハー ド は 高い の で . 
中 古 品 な ん か を 探し だ し て 、 う まく 利用 する し か な いん だ よね 。 


これ と そ シ ュー ティ ン 攻 語 尽誠 還 
グ ゲ ー ム の 原形 だ バタ ー ン だ 。 キミ の 腕 次 第 で 、 こ の ブ 
UTE ログ ラム は さま ざま な 形 に 生ま れ 変 わ 
る だ ろう ね 。 
199 『 
119 ′ UTE UTE GAME by Y^2 
129 『 


139@ CONSOLE 9,25,9,1:WIDTH 49,25:DEFINT A-Z:SCREEN 9,1:CLS 3 
:RANDOMIZE VAL(RIGHT$(TIME$,2) ) :MX=18 

149 INPUT "LEVEL (1-5): "し 

159 IF L く 1 OR L>5 THEN BEEP:GOTO 149 ELSE L=LxX5 

169 CLS:TX=INT(RND(1)*35) :TY=INT(RND( 1 )x22) 

179 1I=INP(9) 

189 IF INP(9)=191 THEN 319 

199 IF 1I=239 THEN MX=MX- 1 

299 IF I=191 THEN MX=MX+ 1 

219 IF MX<9@ THEN MX=9 ELSE IF MX>35 THEN MX=35 

229 LOCATE MX,23:PRINT "4 の 

239 LOCATE TX,TY:PRINT " 0 

249 RX=INT(RND( 1 )*3)-1:RY=INT(RND(1 ) 3 ) - 1 

259 TX=TX+RX:TY=TY+RY 

269 IF TX<9@ THEN TX=9 ELSE IF TX>35 THEN TX=35 

279 IF TY く 9 THEN TY=9 ELSE IF TY>22 THEN TY=22 

289 LOCATE TX,TY:PRINT "< ィ >" 

299 IF INT(RND(1 )xL)=1 AND TX+1>MX AND TX+1 く <MX+4 THEN 369 
399 GOTO 179 

319 COLOR 5:BEEP 1:FOR I=22 TO 9 STEP -1:LOCATE MX+2,1:PRINT 


"1 5 ENEXT 
329 FOR 1=22 TO 9 STEP -1:LOCATE MX+2,I:PRINT " "ji:ENEXT:BEEP 
9:COLOR 7 
339 IF MX+2=TX+1 THEN SC=SC+19:GOTO 169 
349 IF MX+2=TX OR MX+2=TX+2 THEN SC=SC+5:GOTO 169 
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199 A=&H35D9:CALL A 

299 IF K$="8" THEN MY=MY-1 

219 IF K$="2" THEN MY=MY+1 

229 IF K$="4" THEN MX=MX-1 

239 IF K$="6" THEN MX=MX+1 

249 IF MX<1 THEN MX=1 ELSE IF MX>38 THEN_.MX=38 

259 IF MY<1 THEN MY=1 ELSE IF MY>22 THEN MY=22 

0 MX,MY:PRINT "* ED=D+1:COLOR 7:LOCATE 9,24:PRINT 
"MOVE= "iD 

279 DX=ABS(MX-TX) :DY=ABS(MY-TY ) 

289 IF DX>39 OR DY>29 THEN V=8 :GOTO 329 

299 IF DX>29 OR DY>15 THEN V= 
399 IF DX>19 OR DY>19 THEN V=12:GOTO 329 

319 IF DX> 5 OR DY> 5 THEN V=15 ELSE COLOR 2 

329 CMD PLAY "VsViC" 

339 IF MX=TX AND MY=TY THEN COLOR 6:LOCATE 13,9:PRINT "タカ ラ モ ノ 
ヲ ミッ ケタ ソ ~ ! "ECMD PLAY "L8CRDEFGAB>C2":COLOR 7:CALL AiGOTO 149 
349 GOTO 189 


サー クル か ら の ひと こと by STUDIO TEN 

つつ に ゲー ム づ くり の た め に いち ば ん 必要 な こと は 、 た ぶん 根気 と 体力 だ 

アド バイ ス と 思う 。 何 時 間 も 何 日 も 延々 と プロ グラ ム を 打ち 込む と いう 作業 は 、 
9 や っ た も の で な いと わか ら な い 辛 さ が あ る 。 す べ て 入力 し 終え て 、 

HUN し よう と し て 動か な いと き の 汐 し さ 。 バ グ 取 り の わずらわし 

さ 。 こ れ だ け 書 く と 、 や ら な い ほ うがい いん じゃ な いか と 思う けれ 

ど 、 こ れ が や ら ず に いら れ な い 。 ど うし て か と いう と 、 完成 し た と 


\ 


ー ぜ を 生 き の 喜 び が 、 ち ょ っ と や そっ と で 味わえ る も の で は な いか ら な ん だ 。 
アク ショ ング ゲー ム の 芋 : iM7XWSEE: 光 5ES4k コ Pe 
本 パタ ー ン だ ね 光線 を か いく ぐり な が ら 、 先 へ 先 へ と 

進ん で いく アク ショ ン ゲ ー ム 。 レベ ル 
の 設定 も で きる ん だ 。 

199 『" 

11 ' レー サ *- シャ ワー ツク ッ タ ノル ワイ ツー 

129 " 


138 CONSOLE 9,25,9,1:WIDTH 49,25:DEFINT A-Z:CLS 3:RANDOMIZE 

VAL(RIGHT$(TIME$,2) ) : ROUND=9:F=9:TIME=39:LN=2:DIM LX(LN) 

149 IF TIME<9 THEN TIME=20: LN+1:IF LN>4 THEN LN=4 

159 COLOR 7:LOCATE 9,9:PRINT "by HYPA SOFT/Y.Yamada ROUND'i 
ROUND :COLOR 1:LOCATE 38,24:PRINT "$ "iiMX=9 

169 RESTORE:COLOR 7:FOR I=9 TO 39:LOCATE I,1:PRINT "て Pi:NEXT 
:T=TIME 

179 LOCATE MX,24:PRINT " "iiIF INP(9)=191 THEN MX=MX+1 ELSE 

MX=MX- 1 

189 IF MX<9 THEN MX=9 ELSE IF MX=38 THEN TIME=TIME-1:ROUND=R 
OUND+1:F=9:BEEP:GOTO 149 

198 COLOR 4:LOCATE MX,24:PRINT "まり:IF F THEN T=T-1:IF T<9 T 
HEN 219 ELSE 179 

299 F=1:FOR !=9 TO LN:LX(I)=INT(RND(1)*(39-MX) )+MX:COLOR 2:L 
0CATE LX(I),1:PRINT "て "5:NEXT:GOTO 179 


8Z 


単純 だ けど この プ ブログ 5 


つ SN 射 神経 の アク ショ ン ゲ ー ム 。 画面 上 の 
ラム ほお も し ろ い 障害 物 を うま く よ け な が ら 、 ロ と いう 
〇 CC 癌 | 文字 を 拾っ て いき 、 ポ イン ト を か せい 

で いく ん だ 。 


199 

119 ' OCHIRU YOON GAME by Y^2 

2 の 

139 CONSOLE 9,25,9,1:WIDTH 49,25:DEFINT A-Z:SCREEN 9,1:CLS 3 
:RANDOMIZE VAL(RIGHT$(TIME$, 2 ) ) :MX=29 

159 1=INP(9):IF 1I=255 THEN 169 ELSE MX=MX+(1=239)-(1=191)+(M 
X>9 )- (MX く 39 ) 

169 LOCATE MX,8:PRINT "の 5 

179 X=INT(RND(1)x49):LOCATE X,24:PRINT " 
189 X=INT(RND(1 )x49) :LOCATE X,24:PRINT " 
199 A=PEEK( &HF3C8+969+MX+MX ) 

299 IF A=ASC(" 軒 ") THEN COLOR 2:LOCATE MX,8:PRINT "x"iFOR 1=9 
TO 1999:BEEP 1:BEEP 9:NEXT:COLOR 7:CLS:PRINT "GAME OVER ダヨ 
ー ン 。 SCORE= "SCiA=&H35D9:CALL A:END 

219 IF A=ASC("P") THEN BEEP 1:SC=SC+19:BEEP 9 

229 GOTO 159 


サー クル か ら の ひと こと by HYPA SOFT 


つう に 自分 で 絵 が 描け て 、 シ ナリ オ が 書け て 、 プ ログ ラム が 組め れ ば 、 グ 
7 ド バイ ス ー ム ソフ ト を 開発 する の に な に も 問題 は な い 。 け れ ど 、 そ ん な 天 オ 

ィ が あちこち に 転がっ て いる わけ も な く 、 絵 が へ タ だ と か 、 プ ログ ラ 
ム の こと が 全然 わか ら な いと か 、 ク リア し な けれ ば な ら な い 難 問 が 
た くさ ん ある わけ だ 。 そ うい うと き は 、 ゲ ー ム 好き の 友達 を 引き ず 
り 込 む 、 こ れ し か な い 。 と りあ え ず 、 紀 人 は 確保 し た い 。 その あと 
は 、 簡 単 な も の で いい か ら 、 ま ず 一 本 ソフ ト を 作っ て みる こと だ / 


キミ は この プロ グラ ム が 還 の と こ か に 硬 さ れ て いて 
> の ー ソ ル せな が ら 、 そ の 位置 
を ご どう 利用 する や を 探し 出す ん だ 。 音 の 晶 弄 に よっ て 、 宝 
物 の 位置 に 近い か 遠い か が わか る 。 日 
1ANST PG な ん か に 利用 で きそう だ ね 。 
199 " 


119 ' TAKARA SAGASHI GAME FOR SR by Y^2 
129 ‥ 

139 CONSOLE 9.25,9,1:WIDTH 49.25:DEFINT A-Z:SCREEN 9,1:CLS 3 
:RANDOMIZE VAL(RIGHT$(TIME$,2) ) :NEW CMD 

149 CLS:MX=1:MY=1:TX=INT(RND(1)x37)+2:TY=INT(RND(1)x21)+2:CM 
D STOPM 

159 CMD BGM 9:D=-1:LOCATE 9,9:PRINT STRING$(49," 還 "): 

169 FOR 1=1 TO 22:LOCATE 9,1:PRINT " 軒 ":SPC(38):" 攻 "5:NEXT 

179 LOCATE 9.23:PRINT STRING$(49," 軒 ")::GOTO 269 

189 K$=INKEY$:IF K$="" THEN 189 ELSE LOCATE MX,MY:PRINT " "5 


_IF C=9 THEN COLOR 1:FOR I=1 TO LN:LOCATE LX,LX+I:PRINT 
CATE LX,LX:PRINT "MiiFOR I=1 TO LN 
HLOCATE LX,LX+I:PRINT " :NEXT:LOCATE LX,LX+I:PRINT "の "5 
1759 COLOR 5:LOCATE LX+1,LX+1:PRINT "| H 
ATE LX+1,LX+I+1:PRINT " 還 "::NEXT:LOCATE LX+1,LX+1+1:PRINT 
ji: RETURN 

1769 COLOR 5:LOCATE RX,LX+1:PRINT "4"i:FOR 1=1 TO LN-2:LOCAT 
E RX,LX+I+1:PRINT " 國 "::NEXT:LOCATE RX,LX+T+1:PRINT ""5 

IF C=9 THEN COLOR 1:FOR 1=1 TO LN:LOCATE RX+1,LX+I:PRIN 
ji:NEXT:RETURN ELSE COLOR 5:LOCATE RX+1,LX:PRINT "4"5EFO 
R 1=1 TO LN:LOCATE RX+1.LX+I:PRINT " 還 "::NEXT:LOCATE RX+1,LX+ 
1I:PRINT "ERETURN 


1789 COLOR FOR 1=1 TO LN-2:LOCATE LX+2,LX+I+1:PRINT STRING 
$(LN-2," 還 ") ij:NEXT:RETURN 
1799 『 


1899 DATA -1, 9, 1, 9, 9,-1,-1」-1。 1,-1,。 9,-2。-1,-2,。 1。-2。 9 
>-3。-1。-3。 1。-3 6 

1819 DATA 9,-1。 9。 1。 1。 9。 1。-1。 1。 1。 2。 9。 2。-1。 2。 1 3 
9 8)-15、 35、 1 

1829 DATA 1, 9,-1,。 9 9。 1。 1。 1。-1。 1。 9。 2。 1。 2,-1。 2 9 
> LoU 3 

1839 DATA 9, 1, 9,-1,。-1。 9,-1。 1。-1,-1。-2。 9,-2。 1。-2,-1。-9 
>? 9 ュー3。 1。-3-1 


1849 " 

1859 DATA 11111111111111111111 
1869 DATA 13111 4 4 1 
1879 DATA 1 JEU3SMU 
1889 DATA 11141 1 1 
1899 DATA 3 1 人 
1999 DATA 1141111141111141 
1919 DATA 4 
1929 DATA 
1939 DATA 
1949 DATA 
1959 DATA 


1 
1 
1 
まき 1 11 
1 
1 
1 
1969 DATA 11 
1 
1 
1 
1 
1 
1 
1 
1 


才 
1 4 1 1 
1 4 1 

1 


1979 DATA 
1989 DATA 
1999 DATA 
2999 DATA 
2919 DATA 
2929 DATA 
2939 DATA 
2949 DATA 
2959 " 
2969 ' ト ~- モ フ *" ロ クラ マー ノ Y^2( ワ イツ - ) テ ^ ス 。 ショ ー モ ナイ フ " ログ" ラム デース ケト ~ 了 
ソン テ ~ ク レタ ラ 

2979 ウル シク オモ イマ ス 。 へ ー シ ッ ク ヲ リカ イ テ ~ キ ル ヒト 八 ナン テ ^ コン ナ へ タッ ヒ ?ー ナ ファ ロク 


1 
0v 山 sl 1 
1 2 は 
11111111111111111 


289 ' ト オモ ウ カ モ シレ マセ ンカ ^ ミナ イフ リ シテ クタ ^ サ イ 。 ト ^ ナ タカ イイ 了 ル コト リス ~ ム ヲ オシ エ 
テ クタ ~ サ イ 。 
2999 ' サス ライ ノ (!?) Z89 ファ ロク + ラ マー (へ ~ー シ ッ ク ナ ン テ キラ イ ! ) ノ Y^2 デー シタ 。 オ 
ワリ タバ ヨー ニン 。 


89 


1359 “ 


1369 COLOR 2:LOCATE 9,15:PRINT "カリ チョ ー ン 111" 5 EGOTO 1239 
1379 COLOR 5:LOCATE 9,15:PRINT "スス メ ナ イ ッ タ ラ スス メ ナ イ "EGOTO 1239 
1389 " 

1399 


1=9 
1499 READ VX,VY:P(1)=M(X+VX,Y+VY,FL ) 
ユ 


1419 1F 1I=2 THEN IF P(2)=1 THEN 1469 
1429 IF 1=5 THEN IF P(5)=1 THEN 1469 
1439 1I=I+1 

1449 IF 1<>11 THEN 1499 

1459 

1469 CLS 


1479 LX=9:RX=11:LN=11 

1489 IF P(9)<>1 THEN COLOR 1:FOR 1=1 TO LN-2:LOCATE LX,LX+I+ 
1:PRINT " 較 功 NEXT ELSE C=1:GOSUB 1740 

1499 IF P(1) く >1 THEN COLOR 1:FOR 1=1 TO LN-2:LOCATE RX,LX+1+ 
1:PRINT " 較 還 NEXT ELSE C=1:GOSUB 1760 

1599 IF P(2)=1 THEN GOSUB 1789 ELSE 1529 

1519 GOTO 1719 

1529 IF P(9) く >1 AND P(3) く <>1 THEN FOR 1=1 TO LN+2:LOCATE LX,L 


X+I:PRINT " "iiNEXT 
1539 IF P(1)<>1 AND P(4)<>1 THEN FOR 1=1 TO LN+2:LOCATE RX,L 
X+IEPRINT " "ENEXT 


1549 LX=2:RX= 9:LN= 7 
1559 IF P(3) く >1 THEN COLOR 1:FOR 1=1 TO LN-2:LOCATE LX,LX+1+ 
1:PRINT " 較 較 ": NEXT ELSE C=1:GOSUB 1749 

1569 IF P(4) く >1 THEN COLOR 1:FOR 1=1 TO LN-2:LOCATE RX,LX+1+ 
1:PRINT " 較 較 "::NEXT ELSE C=1:GOSUB 1769 

1579 IF P(5)=1 THEN GOSUB 1789 ELSE 1599 

1589 GOTO 1719 

1599 IF P(3) く <>1 AND P(6)<>1 THEN FOR I=1 TO LN+2:LOCATE LX,L 
X+IEPRINT " "jiENEXT 

1699 IF P(4) く >1 AND P(7) く >1 THEN FOR 1I=1 TO LN+2:LOCATE RX,L 
X+I:iPRINT " "iiNEXT 

1619 LX=4:RX= 7:LN= 3 

1629 IF P(5) く >1 AND P(6) く <>1 AND P(7) く <>1 THEN 1719 

1639 IF P(6)<>1 AND P(7) く <>1 THEN COLOR 1:FOR 1=1 TO 3:LOCATE 
LX,LX+I:PRINT " 還 還 還 蘭 ": NEXTEGOTO 1719 

1649 IF P(6)<>1 THEN COLOR 1:LOCATE LX,LX+2:PRINT " 還 還 較 ": ELS 
E C=1:GOSUB 1749 

1659 IF P(7) く >1 THEN COLOR 1:LOCATE RX-1 ,LX+2:PRINT " 還 還 較 " 
LSE C=1:GOSUB 1769 

1669 IF P(6) く >1 AND P(9) く >1 THEN FOR 1=1 TO LN+2:LOCATE LX,L 
X+IEPRINT " "jiNEXT 

1679 IF P(7) く >1 AND P(19) く >1 THEN FOR 1=1 TO LN+2:LOCATE RX, 
LX+I:PRINT " "jiNEXT 

1689 IF P(8) く >1 THEN Wi "ELSE W$=" 
1699 COLOR 1:LOCATE 6,6:PRINT W$: 
1799 ' 

1719 IF M(X,Y,FL)=3 THEN A$="GOAL IN !!!"iFOR 1=1 TO LEN(A$) 
:COLOR INT(RND(1)*7)+1:LOCATE I,6:PRINT.MID$(A$,T,1)j:BEEP:N 
EXT:COLOR 7:WHILE INKEY$=" "WEND:WIDTH 89:CLS:END 
1729 A=&H35D9:CALL AiGOTO 1230 

1739 * 


3) E 


オリ ジ ナ ル の ロタ ダン レル 


ささ 


ン ヨ 


ソー 1 三 ム が 収め られ て いる 。 あ る 程度 償 れ て 
ン に 挑戦 し よう / ちょ っ と いじ っ て 自分 だ け の 


AAZZE 4 2 なつ くら 


1999 
1919 
1929 
1939 
1949 
1959 
1969 
3 

1979 
1989 
1859 
1999 
1199 
1119 
1129 
1139 
1149 
1159 
1169 
1179 
1189 
1199 
1299 
1219 
1229 
1239 
1249 
1259 
1269 
E IF 
1279 
E IF 
1289 
EL 人 E 
1299 
1399 
1319 


・ 3D-MAZE Version 1.96 
・ Programed by Y.Yamada 
り (C) HYPA SOFT 


* テイ オウ ノイ シ ヨロ シク ネ 
CONSOLE 9,25,9,1:WIDTH 49,25:SCREEN 9,1:DEFINT A-Z:CLS 


COLOR 3:LOCATE 14,9:PRINT "チョ ッ ト マッ テ ネ 生け 
MX=19:MY=19:FL=9:DIM M(MX+1,MY+1,FL) ,P(19):F=9:RESTORE 


FOR H=9 TO FL 
FOR I=9 TO MY 
READ A$ 
FOR J=9 TO MX 
B$=MID$(A$,J+1,1):IF B$=" " THEN B$="9" 
M(J, 1,H)=VAL(B$) 
IF M(J,I,H)=2 THEN X=J:Y= 1 
NEXT 
NEXT 
NEXT 


CLS:GOTO 1299 


K$=INKEY$:IF K$="" THEN 1239 
BEEP 1:FOR I=9 TO 59:NEXT:BEEP 9 


IF K$ " THEN 1299 

IF K$="2" THEN IF F=9 THEN F=2 ELSE IF F=1 THEN F=3 ELS 
F=2 THEN F=9 ELSE F=1 

IF K$="4" THEN IF F=9 THEN F=3 ELSE IF F=1 THEN F=9 ELS 
F=2 THEN F=1 ELSE F=2 

IF K$="6" THEN IF F=9 THEN F=1 ELSE IF F=1 THEN F=2 ELS 
F=2 THEN F=3 ELSE F=9 

329 ,1339,1349 


ON F+1 GOTO 1319,1 
RESTORE 1899:A=M(X ,Y-1,FL):IF K$="8" THEN IF A=1 THEN 


GOTO 1369 ELSE IF A=4 THEN 1379 ELSE Y=Y-1:GOTO 1399 ELSE 1 


399 
1329 


) Front 


RESTORE 1819:A=M(X+1,Y ,FL):IF K$="8" THEN IF A=1 THEN 


GOTO 1369 ELSE IF A=4 THEN 1379 ELSE X=X+1:GOTO 1399 ELSE 1 


399 
1339 


Right 


RESTORE 1829:A=M(X  ,Y+1,FL):IF K$="8" THEN IF A=1 THEN 


GOTO 1369 ELSE IF A=4 THEN GOTO 1379 ELSE Y=Y+1:GOTO 1399 E 
LSE 1399 ' Back 


1349 


RESTORE 1839:A=M(X-1,Y ,FL):IF K$="8" THEN IF A=1 THEN 


GOTO 1369 ELSE IF A=4 THEN GOTO 1379 ELSE X=X-1:GOTO 1399E 
LSE 1399 ' Left 


91 


【 キ ー 操 作 】 


1479 IF 1<>11 THEN 1499 
1489 ” 

1499 CLS 

1599 LX=9: RX=11: 
1519 

save "game1" 


LN=11 


キー を 押せ ば 、 い まま で 打ち 込ん で い 


が 、「gamel」 ほ とい う フ ァイル ネー ム で 、 
ディ スク に save さ きれ る 。 な お 、save 中 に は 、 ド ラ 

イプ 1 の 赤い ラン プ が 点 減 す る 

【 キ ネー 操作 】 品 

1479 IF 1I<>11 THEN 1499 

1489 ” 

1499 CLS 

1599 LXs9: RX=11: LNs11 

1519 

save "game1 ソ 7 

0k 

L」 

ご れ で OK 


た だ 、 ほ ん と うに save き れ た か どう か 、』 
いわ け で 6 も な い 。 そこで 、files を 使っ て 、: 
ク に 保存 され て いる プロ グラ ム を 確認 

し ょ うぅ 
【 キ ネー 操作 】 


fiLes 


9ame1 . 1 
Ok 


L 
確か ! 
が わか ヵ 


園 フロ ク ラム の LOAD 


っ た ん リモ ッ ト ス イッ チ を 押し て プロ 
9 て し まお う 

プロ グラ ム は ディ スク に save き れ て いる の だ か ら も 6 う 
安心 。 

それ で は 「gamel」 を 呼び 出し て みよ う 。 


プロ グラ ム の 呼び 出し に は LOAD 


HIHIHIGIBIE 


Tgamel」 の プロ グラ ム が 保存 きれ て いる こと 


を 使う 。 
も し 、 フ ァイル ネ 忘 れ て し まっ た と き に は どう 
し よう? そう 、 先 ほぼ の files を 使え ば 、 フ ァイル ネー 


ム を 確認 で きる の だ 。 そ れ か ら load す れ ば いい わけ が だ, 


【 キ ー 操 作 】 gmHUTgggIE 


Disk version [May 24,1985] 

How many fiLes(9-15)? 

NEC N-88 BASIC Version 2.9 
Copyright (C) 1981 by Microsoft 
XXt Bytes free 

Ok 

Load "game1” 

Ok 

年 


た だ 、 こ れ だ け で は 、 確 か 
ら な い 。 そこ で list を 使 お う 


L18ST は プロ グラ ム を 表示 させ る 


load で 


命令 だ 

【 キ ー 操 作 】 生還 回 還 [ 

1479 IF <>11 THEN 1499 
1489 ! 

1499 CLS 

1599 LX=9: RX=11: LN=11 


00 行 ま て 入力 て ある の で 、 
RInIQIOIIIIHIIIOI 


とし て 、1510 行 か ら 入 力 す れ ば いい | 
これ で *、 の ログ ラプ ム の 所 自由 に 行え る 
よう に な っ た は ず だ 。 プ ログ ラム 入力 の 、 最 後 ま 
で 根気 よく ち 続 ける こと そう すれ ば 、 楽 し い ゲ ー ム 
を 思う 人 存 分 プレ イ で きる 
N こ = エーコ 
い 
ブ プログラム 入力 の 注意 


と ころ が 、 こ う や っ て 苦労 し て 入力 し な プロ グラ ム 
実行 し て みる と 、 最 初 は 
function call」 ほ いっ た 

エラ ー が 続出 

楽し め ゆる と いう 状況 に は な ら 
* を 正しく 打 
ち 込 まな か っ た こと が 原因 (自分 で は 正しく 打ち 込ん だ 
、 や は り 9 ミス が つき も の )。「 0」( で ロ ) 上 「0」 


も 、 


「Syntax error」 と か 「Illegal 


エラ ー は 、 プ ログ 


コ ( カ ンマ) と 「.」( ピ ビリ オド) な ど 、 混 乱 し や す 
違え て 打っ て いる こと が 多い 。 
エラ ー の 修正 (デバッグ と いう ) に は 、 コ ツ 


N ある 程度 BASIC の 知識 が 必要 と な る 。 初 


心 者 は あれ これ 込ま な いで 、 プ リン タ で 印刷 し た プ フ 
ログ ラム リス ト UMG り 比 較 し て 
ひと つ ず つつ ぶし て いく 


し か な い だ ろ う 。 
で は 、 成 功 を 祈る 


【 キ ネー 操作 】 


還 病 HHHHHEBBBBBB 日 


こう し て 、1010 行 、1020 行 、1030 行 と 打ち 込ん で い 《。 


圏 AUTO の 利用 


な お 、 今 の 例 で は 行 番号 を 自分 で 入力 し た が 、 じ つ は 行 
番号 を PC-88 に 自動 的 に 打ち 込ま せる と いう 方 法 $ お る 。 
DISK-BASIC が 呼び 出さ きれ た と ころ で 、 す で プロ グラ ム 
リス ト を 打ち 込ま な いで 、“auto" に いう 命令 を 使う 。 似 


下 に 掲載 し た プロ グラ ム 例 は 1000 行 か ら 始 まっ て いる か 
ら 、「auto 1000」 と 指定 し よう 。 
回 回 回 間 iM 還 


【 キ ー 操 作 】 


する ほ 「1000」 ま で 自動 的 に 表示 され る 。 も ちろ ん 、 
命令 女 を 打ち 込ん で 、 最 後に 同 キ ー を 押せ ば 、 自 動 的 に 
次 の 行 番 号 が 表示 され る 。 つ まり 、 行 番号 を 打ち 込ま な 
《 て すむ わけ だ 。 

【 キ ー 操 作 】 HHHHEEBEEBE 避 


この よう に 、auto を 使え ば 行 番 号 を 打つ 手間 が 省け る 
し 、 な に より も 行 番号 の 打ち 間違い が な 《 な る か ら 、 ぜ 
ひ 利 用 し た い 。 な お 、 行 番号 を 自動 的 に 発生 させ る モー 
ド か ら ぬ け 出 し た いと き は 

[TOP| キー を 押す 。 

と ころ で 、 す べ て の プロ グラ ム が 必ず し も 10 行 お き で | 

書か れ て いる と は 限ら な い 。 た と えば 、 ほ と ん ど 10 行 お 


93 


きだ が 、 と きど き 1895 行 と か 2055 行 し いっ た 端数 の 行 番 
号 が 使わ れ て いる プロ グラ ムリ スト 5 少な で な い 。 打ち 
込む 前 に デ ロ グ ラム リス ト を ぎっ と 眺め て 、 端 数 の 行 番 
号 が いく つも ある よう だ っ た ら auto は 使わ な が い ほ うがい 
い だ ろ うぅ 。 


較 プ ログ ラム の SAVE 


PC-88 に 限ら ず パ ソコ ン は 、 電 源 を 切る と 、 
プロ グラ ム が 消え て し まう 。 
そこ で 、 打 ち 込 ん だ プロ グラ ム を ディ スク に 保存 、 つ ま 
り save する こと に な る 。 

本 誌 で 紹介 し て いる プロ グラ ム は 、 そ れ は ほど 長い も の 
が な い の で 、 根 性 さえ あれ ば 一 気 に 打 ち 込 むこ と も で き 
る だ ろう 。 だ が ガー、 停 電 な ど が あっ て 「 せ っ か 4 時 
間 か け て 打ち 込ん だ ど プ ログ ラム が 消 た ちゃ っ だ た 」 と いう 
よう な 事態 を 防ぐ で ため に 5、 こ まめ に save し た ほう が い 
い 。save き え し て お け ば 、 い つ で 6 呼び 出す こと が で き 
る の だ か ら 。 

で は 、save の 方 法 を 紹介 し よう 。 で は 、 仮 に 、auto 
を 使っ て 1500 行 まで プロ グラ ム を 打ち 込ん だ こと に し よ 
シメ 】 

1500 行 の 命令 娘 を 打ち 終わ っ て 則 キー を 押し た と こみ 
で 、 画 面 は きっ と 次 の よう に な っ て いる は ず だ 。 

【 キ ー 操 作 】 


ここ で 、STOP キ ー を 押す と auto が 終了 し 、BASIC 
の 入力 待ち の 状態 に な る 。 
キー 操作 】 STOE 


ドラ イブ 1 に 、 先 ほど 作っ た シス テム ディ スク を モッ 
ト し 、 次 に 、save す る プロ グラ ム の ファ イル ネー ム を 決 
め る 。 


ファ イル ネー ム と は プロ グラ ム の 名 前 
の こと で 、 英 数 字 カ ナ (アル ファ ベッ ト 、 数 字 、 カ タカ 
ナ ) 5 朗 字 以内 で 自由 に 決め る こと が で きる (実際 に は 
最大 8 文字 まで 使え る が 、 扱 い が 面倒 な の で 5 文字 と 考 
えた ほう が いい )。 
ここ で は 、 仮 に 「gamel」 と いう ファ イル ネー ム を つ 
ける こ L 上 に し よう 。 


【 キ ネー 操作 】 回 
まま ま ディ スク ユー ティ リ デ ティー まま * ま * 


1 フロ ッ ピ ビー ディス ク の コピ ー 
2 シス テム ディ スク の 作成 

3 デー タデ ィ ス ク の 作成 

4 ID セ クタ の 書き 換え 

5 終了 


実行 し た い 処理 の 番号 を 選ん で くだ さい | 


ここ で は 「2 」 を 選ぶ 。 
【 キ ー 操 作 】 図 ロ 


【 シ ステ ム デ ィ ス ク の 作成 】 


シス テム ディ スク を セッ ト し た ドラ イブ 番号 ? 


ロコ 

【 キ ー 操 作 】 同 

新しい 2y"- デ ィ 22 を セッ ト し た ドラ イブ 番号 ? 
買っ て き ンク ディ スク (また は 使い 古 し の ディ 
スク ) ド に セッ ト し て 、『2」 を 

【 キ ー 操 作 ] 図 品 


物理 フォ ー マ ッ ト を し ます か (Yy ノ n) 7 


で 物理 フォ 
詳し い 説 明 は 省く が 、 
【 キ ー 操 作 】 回 品 

ドラ イプ 2 の ディ スク を フォ ー マ ッ ト し ます 。 
よろ し いで すか ? (y ノ n) 7 

も う 一 度 確 
物理 フォ ー 


か 聞い て (る 。 


認 し て くる 。 な ん だ か し つこ 
ッ ト し て し まう ょ と 、 そ れ ま て 
か れ て い て 消え て し まう か 
大 切な ディ スク を 等 る た め の 配 慮 と いえ る 。 こ 
度 、[j を 入力 する 。 す る と 、 以 下 の よ うな メッ セー ジ が 
表示 され て 、 物 理 フォ ー マ ッ ト が 始ま る 。 
【 キ ー 操 作 】 団 | 
物理 フォ ー マ ッ ト 中 で す 。 

続け て 、 自 動 的 に > 
の コピ ー が 行わ れる 。 
シス デム フォ ー マ ッ ト 中 で す 。 
シス テム コピ ー 中 で す 。 


ステ ム フ ォ ー マ ッ ト 上 と 、 シ ステ ム 


シス テム ディ スク は ドラ イプ 1 に モッ ト し て ある の で 、 


シス テム 
了 に し ょ う 。 
【 キ ー 操 作 】 
まま * ま ディ スク ユー ティ リティ ー*# ま * ま 


"イス ク は 1 枚 あ れ ば 十分 どか ら 、 こ れ で 終 
最初 の メニ ュー 画面 に 戻る 。 


ソロ ッ ピー ディ スタ の コピ ー 
2 シス テム ディ スク の 作成 

3 デー タデ ィ ス ク の 作成 

4 ID セク タ の 青き 換え 

5 終了 


実行 し た い 処理 の 番号 を 選ん で くだ さい ? 


「5」 の 「 終 了 」 を 選ぶ と 
の 入力 待ち の 状態 に 戻る 


プロ グラ ム が 終了 し 、BA 


ディ スク の 作成 は 終わ っ た 
1 に セッ ト し た オリ ジ ナ ル の シス テム ディ 
使う と き の た め に 大 切 に 保存 し て お こう 


較 ブロ グラ ム の 入力 


さて 、 コ ピー し た シス テム ディ スク を 使っ て 、 お 待ち 

か ね の プロ グラ ム の 入力 だ 。 が 、 そ の 前 に 、 プ ログ ラム 
リス ト の 例 を 見 て ほし い 。 

庄 側 、1000 番 か ら 始 まる 10 番 ご と の 飛び 番号 に な っ て 


いる 。 これが 行 番 号 で 、 プ ログ ラム の 処理 の 順番 を 示し 
て いる 。 行 番号 の 有 側 は 英語 、 数 : け の 集まり 


いる が 、 こ れ が 合 、PC-88 は 命令 娘 を 
が ら プ ログ すす る 。 
【 プ ログ ラム リス ト の 例 】 
DO ーー と 
1919 '′ 922? ル List 
1929 ” OO 


1939 CONSOLE 9,25,9,1 

1949 MIDTH 49,25 

1959 ” 

1969 FOR 1I=1 TO 7 

1979 COLOR 1 

1989 PRINT "フロ 2 パ ラ 6 ノ ルッ シュウ” 
1999 NEXT 1 

1199 END 


シス テム の コピ ー が 終了 する と 、 以 下 の メ ッ セ ー ジ が 
表示 され る 。 


終了 し まし た 。 
ディ 2 人 3- テ ティー の 作業 を 続け ます か ( ッ ノ n) 2?| 


で は 、 入 力 を 始め よう 。 プ ログ ラム リス ト を その まま 
打ち 込ん で いけ ば いい わけ だ 。 た と えば 、 最 初 の 1000 行 
は 以下 の よう に 打ち 込む 。 空白 も スペ ー ス キー を 押す こ 
と を 忘れ な いよ うに 。 1 行 分 の 入力 が 終 れ ば 、 最 後に 回 
キー を 押す 。 
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コン 


較 打ち 込み の 前 に 


今回 の ブロ グラ ム 講 座 で 使用 し て いる シス テム ディ ス 
ク は 、N.88BASICver2.0 で す 。 バ パー ジョ ン の 違い に よっ 
て メニ ュー 画面 が 多少 異な り ま す が 、 基 本 的 に 内 容 は 同 
じ で す 。 詳 し く は 付属 の マニ ュ ア ル を 参照 し て くだ さい 。 


プ ョ タク を 打ち 込む と いう と 、 経 験 の な い 読者 に と 
っ て は 、 な ん だ か 

と て つも な い 大 事業 

な い 。 と て に 、 い まま で パソ コン を ゲ 
と が な く 、 プ ログ ラム と いう も 5 の に 
きい か か わっ た こと が な い の で あれ ば 、 な お さら の 
こじ だろ う 。 

と ころ が 、 き ちん と し た 手順 を 踏ん で 、 い くつ か の ル 
ー ル きえ \ れ ば 、 プロ グラ ムリ スト の 打ち 込み ほど 簡単 
で 単純 な 作業 は な い 。 慣れ て し まえ ば むし ろ 、 こ れ は ほど 
思う よう に な る 。 


た る い ル ー テ ィ ン ワ ー ク は な い 、 
、 気楽 se 
読者 が 用 意 し な く て は いけ な いも の 。 つ まり 、 

の 必要 な も の 
を あげ て いく こ 上 に し よ 

PC-88 の フル セッ 人 4 スプ レイ 、 プ リン タ ) 

eN88-BASIC シ ステ ム デ ィ ス ク (本 体 付属 ) 

@ プ ラン ク デ イィ スク 

順番 に 説明 し よう 。 まず 必要 と な る の が PC-88。 を それ も 
本 体 、 デ イス プレ イ 、 プ リン タ の フル キッ ト が 必要 と な 
る 。 プ リン タ は 必ず し も 必要 で は な い が 、 あ と か ら 説 明 
する よう を 正しく 打ち 込ん だ か ど 
うか を 確認 する に は 、 画 面 よ り も プリ ンタ で 打ち 出し 
リス ト の ほう が は る か に 見 や すい 。 打ち込み 後 の デ 
グ (打ち 込み ミス の 修正 ) の 

苦労 も 少な い 。 

し みた い の な ら 、 


プロ グラ ムリ スト 


侯 も 早 て (ゲーム 
た ほう が いい ね 。 
、N88-BASIC の シス テム ディ スク 。 本 体 を 買っ 
て 箱 か ら 取 り 出し た と き 、 何 枚 か の ディ スク が 付属 し て 
いた こと いる だ ろう (PC-88 を ゲー ム に し か 使っ 
て いな いよ うだ っ た ら 、 ど こ か に し まい 込ん で 宮 れ て い 
る か も し れ な いけ ぼ )。 その な か の 一 つ に 、N88-BASIC 
ド は ず だ 。 似 た よう な も の に N 
、 信 回 は N88-BASIC を 使う 


プリ ンタ は あっ 


シス テム ディ スク が 3 

88- 日 本 語 BASIC が あ 

の で 間違え な いよ うに 。 
問題 は 、 最 後 の プ ラン ク デ ィ ス ク だ 。 あ ら た め て 述べ 
る まで も な く 、 プ ログ ラム の 保存 に は ディ スク を 使う 。 
な に も プロ グラ ム が 書き 込ま れ て いな い デ ィ ス ク の こ 
と を プラ ンク ディ スク と 呼ぶ が 、 こ れ を 手 に 入れ よう 。 


パソ コン ショ ッ プ て 売っ て いる か ら 、 
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BAIC 入 内 講 座 


己 D の ブラ ンク ディ スク を くだ さい 
と お 店 の 人 に 言え ば いい 。 
手もと に 使い 証し の ディ スク (た と えば 、 も う 遊 ば な く 
な っ た ゲー ム と か ね ) が あれ ば 、 そ れ を 利用 する こと もち 
で きる 。 な に も 、 新 品 の プラ ンク ディ スク を 買わ な く て 
も いい わけ だ 。 


較 2 テム ティ ス 22 を 作る 


プロ グラ ム を 入力 する に は 、 プ ラン ク デ ィ ス ク を 
フォ ー マ ッ ト し て 

シス テム ディ スク を 作ら な く 《 て は いけ な い 。 フォ ー マ ッ 
ト な ん て いう 専門 を 使う と いか に も 黄 し を うだ が 、 
PC-88 に は その た め の プ ログ ラム が 用 意 さ れ て いる か ら 、 
思っ た より 簡単 な は ず だ 。 その 手順 を 紹介 し よう 。 

まず 、N88-BASIC の シス テム ディ スク を ドラ イブ 1 
に セッ ト し て 、 リ セッ トス イッ チ を 押す 。 そ う 、 こ こま 
で は ゲー ム を 立ち 上 げ る と き の 操 作 と まっ た く 同 じ ヵ 


Disk version [May 24,1985] 
How many fiLes(9-15)? 


DISK_BASIC が 立ち 上 が る と 「How many files(0.15) 
?」 聞い て 《 る 。 こ こ で は 回 キー だ け を 押 そ う 。 
【 キ ー 操 作 】 


Disk version [May 24,19851 

How many fiLes(9-15)? 

NEC N-88 BASIC Version 2.9 
Copyright (C) 1981 by Microsoft 
kt ByteS free 

Ok 


、 シ ステ チム ディ スク 作成 用 の プロ グラ ム で ある 
dskut2. j88」 を スタ ー ト きせ る (ディ スク ドラ イブ が 1 
ドラ イプ だ け の PC-88 で あれ ば 、「dskut1.j88」 を 使う の 

『、 き っ 1 ドライブ の PC-88 を 使っ て いる 読者 は い 


【 キ ー 操 作 】 回 回 回 H 還 5 


Disk version [May 24,19851 

How many fiLes(9-15)2 

NEC N-88 BASIC Version 2.9 
Copyright (C) 1981 by Microsof 
KKXXX Bytes fre@ 
Ok 

run “dskut2.1887 


プロ グラ ム 名 を 正 し 〈 入力 し て 回 キー を 押す と 、 し ば 
らく だ っ て か ら 次 の よう な メニ ュー が 表示 きれ る 。 


キミ も チャ レン ジ ! 
だ れ で も 剛 単 に 人 月 で きる 
N-69 ペ ー ジ ッ ク ブ ログ ラム 
os フロ ッ ラム 講座 つき 


「 自 分 で ゲー ム が 作れ た ら な 一 」 な ん て 思っ て いる キミ / 頭 の 中 で 考え る より 、 ま ず は チャ レン ジ し 
て みよ う 。 プ ログ ラム を 入力 する の は 、 決 まり ご と さえ きち ん と 守れ ば 、 そ れ ほ ど 難 し いこ と じゃ 
な いん だ 。 つ ま ら な い 失 敗 を し な いよ う 、 入 力 を 始め る 前 に 、 基 本 的 な こと を 説明 し て ある プロ グ 
ラム 講座 を 読ん で 勉強 し て ね / それ で は キミ の 健闘 を 祈る 。 


